/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_2 / issue_08 / hdbnew

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 20 | 48 44 42 61 63 6b 75 70 |..... > |HDBackup|
|00000010| 0d 00 14 04 0d 00 1e 05 | 3a 0d 00 28 21 3a 20 f4 |........|:..(!: .|
|00000020| 20 49 6e 63 72 65 6d 65 | 6e 74 61 6c 20 76 6f 6c | Increme|ntal vol|
|00000030| 75 6d 65 20 62 61 63 6b | 75 70 0d 00 32 05 3a 0d |ume back|up..2.:.|
|00000040| 00 3c 1f 3a 20 f4 20 28 | 63 29 20 20 4e 6f 76 65 |.<.: . (|c)  Nove|
|00000050| 6d 62 65 72 20 31 39 38 | 38 20 20 4a 4a 4d 0d 00 |mber 198|8  JJM..|
|00000060| 46 05 3a 0d 00 50 45 3a | 20 f4 20 56 65 72 73 69 |F.:..PE:| . Versi|
|00000070| 6f 6e 20 32 2e 30 30 20 | 69 6e 63 6f 72 70 6f 72 |on 2.00 |incorpor|
|00000080| 61 74 69 6e 67 20 73 75 | 67 67 65 73 74 69 6f 6e |ating su|ggestion|
|00000090| 73 20 61 6e 64 20 62 69 | 74 73 20 6f 66 20 63 6f |s and bi|ts of co|
|000000a0| 64 65 20 66 72 6f 6d 3a | 0d 00 5a 1f 3a 20 f4 20 |de from:|..Z.: . |
|000000b0| 20 20 44 72 2e 20 4f 72 | 61 6d 20 61 6e 64 20 50 |  Dr. Or|am and P|
|000000c0| 61 72 74 6e 65 72 73 0d | 00 64 16 3a 20 f4 20 20 |artners.|.d.: .  |
|000000d0| 20 43 6f 6c 69 6e 20 47 | 6c 6f 76 65 72 0d 00 6e | Colin G|lover..n|
|000000e0| 19 3a 20 f4 20 20 20 4b | 65 69 74 68 20 4a 20 47 |.: .   K|eith J G|
|000000f0| 61 72 64 6e 65 72 0d 00 | 78 14 3a 20 f4 20 20 20 |ardner..|x.: .   |
|00000100| 47 6c 65 6e 20 42 79 72 | 61 6d 0d 00 82 16 3a 20 |Glen Byr|am....: |
|00000110| f4 20 20 20 4a 6f 68 6e | 20 47 61 72 72 65 74 74 |.   John| Garrett|
|00000120| 0d 00 8c 14 3a 20 f4 20 | 20 20 50 61 75 6c 20 48 |....: . |  Paul H|
|00000130| 6f 62 62 73 0d 00 96 05 | 3a 0d 00 a0 04 0d 00 aa |obbs....|:.......|
|00000140| 0f eb 20 30 20 3a 20 fb | 20 30 2c 34 0d 00 b4 0c |.. 0 : .| 0,4....|
|00000150| 72 65 61 6c 20 3d 20 b9 | 0d 00 be 2b f1 20 27 27 |real = .|...+. ''|
|00000160| 22 20 20 49 6e 63 72 65 | 6d 65 6e 74 61 6c 20 42 |"  Incre|mental B|
|00000170| 61 63 6b 75 70 20 76 65 | 72 73 69 6f 6e 20 32 2e |ackup ve|rsion 2.|
|00000180| 30 30 22 0d 00 c8 2b f1 | 20 22 20 20 2d 2d 2d 2d |00"...+.| "  ----|
|00000190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 22 27 27 0d 00 |--------|---"''..|
|000001b0| d2 0b 40 25 20 3d 20 31 | 30 0d 00 dc 05 3a 0d 00 |..@% = 1|0....:..|
|000001c0| e6 2d e8 20 22 45 6e 74 | 65 72 3a 20 20 73 6f 75 |.-. "Ent|er:  sou|
|000001d0| 72 63 65 20 64 72 69 76 | 65 20 6e 75 6d 62 65 72 |rce driv|e number|
|000001e0| 20 5b 34 5d 3a 20 22 20 | 64 72 24 0d 00 f0 31 e7 | [4]: " |dr$...1.|
|000001f0| 20 64 72 24 3d 22 22 20 | 8c 20 73 72 63 64 72 76 | dr$="" |. srcdrv|
|00000200| 24 20 3d 20 22 3a 34 22 | 20 8b 20 73 72 63 64 72 |$ = ":4"| . srcdr|
|00000210| 76 24 20 3d 20 22 3a 22 | 2b 64 72 24 0d 00 fa 32 |v$ = ":"|+dr$...2|
|00000220| e8 20 22 45 6e 74 65 72 | 3a 20 20 64 65 73 74 69 |. "Enter|:  desti|
|00000230| 6e 61 74 69 6f 6e 20 64 | 72 69 76 65 20 6e 75 6d |nation d|rive num|
|00000240| 62 65 72 20 5b 30 5d 3a | 20 22 20 64 72 24 0d 01 |ber [0]:| " dr$..|
|00000250| 04 31 e7 20 64 72 24 3d | 22 22 20 8c 20 64 73 74 |.1. dr$=|"" . dst|
|00000260| 64 72 76 24 20 3d 20 22 | 3a 30 22 20 8b 20 64 73 |drv$ = "|:0" . ds|
|00000270| 74 64 72 76 24 20 3d 20 | 22 3a 22 2b 64 72 24 0d |tdrv$ = |":"+dr$.|
|00000280| 01 0e 05 3a 0d 01 18 40 | f1 20 27 22 49 6e 66 6f |...:...@|. '"Info|
|00000290| 3a 20 20 62 61 63 6b 69 | 6e 67 20 75 70 20 64 72 |:  backi|ng up dr|
|000002a0| 69 76 65 20 22 3b 73 72 | 63 64 72 76 24 3b 22 20 |ive ";sr|cdrv$;" |
|000002b0| 6f 6e 74 6f 20 64 72 69 | 76 65 20 22 3b 64 73 74 |onto dri|ve ";dst|
|000002c0| 64 72 76 24 0d 01 22 0a | f2 64 64 61 74 65 0d 01 |drv$..".|.ddate..|
|000002d0| 2c 0c e7 20 66 75 6c 6c | 20 8c 0d 01 36 40 20 f1 |,.. full| ...6@ .|
|000002e0| 20 22 57 61 72 6e 69 6e | 67 3a 20 20 70 72 6f 62 | "Warnin|g:  prob|
|000002f0| 6c 65 6d 20 72 65 61 64 | 69 6e 67 20 6c 61 73 74 |lem read|ing last|
|00000300| 20 64 61 74 65 2c 20 64 | 75 6d 70 69 6e 67 20 65 | date, d|umping e|
|00000310| 76 65 72 79 74 68 69 6e | 67 22 0d 01 40 05 cc 0d |verythin|g"..@...|
|00000320| 01 4a 37 20 f1 20 22 49 | 6e 66 6f 3a 20 20 6c 61 |.J7 . "I|nfo:  la|
|00000330| 73 74 20 64 75 6d 70 20 | 64 61 74 65 20 77 61 73 |st dump |date was|
|00000340| 20 22 3b 64 61 74 65 24 | 3b 22 20 28 22 3b 64 61 | ";date$|;" (";da|
|00000350| 74 65 3b 22 29 22 0d 01 | 54 50 20 f1 20 22 43 6f |te;")"..|TP . "Co|
|00000360| 6e 66 69 72 6d 3a 20 20 | 49 6e 63 72 65 6d 65 6e |nfirm:  |Incremen|
|00000370| 74 61 6c 20 62 61 63 6b | 75 70 20 73 69 6e 63 65 |tal back|up since|
|00000380| 20 74 68 69 73 20 64 61 | 74 65 20 28 4e 20 3d 20 | this da|te (N = |
|00000390| 66 75 6c 6c 20 62 61 63 | 6b 75 70 29 20 28 59 2f |full bac|kup) (Y/|
|000003a0| 4e 29 3a 20 22 3b 0d 01 | 5e 18 20 66 75 6c 6c 20 |N): ";..|^. full |
|000003b0| 3d 20 ac 20 a4 79 65 73 | 6e 6f 20 3a 20 f1 0d 01 |= . .yes|no : ...|
|000003c0| 68 4c 20 f1 20 22 43 6f | 6e 66 69 72 6d 3a 20 20 |hL . "Co|nfirm:  |
|000003d0| 55 73 65 20 65 78 63 6c | 75 73 69 6f 6e 20 6c 69 |Use excl|usion li|
|000003e0| 73 74 20 28 4e 20 3d 20 | 70 72 6f 63 65 73 73 20 |st (N = |process |
|000003f0| 61 6c 6c 20 64 69 72 65 | 63 74 6f 72 69 65 73 29 |all dire|ctories)|
|00000400| 20 28 59 2f 4e 29 3a 20 | 22 3b 0d 01 72 17 20 73 | (Y/N): |";..r. s|
|00000410| 65 6c 20 3d 20 a4 79 65 | 73 6e 6f 20 3a 20 f1 20 |el = .ye|sno : . |
|00000420| 27 0d 01 7c 05 cd 0d 01 | 86 05 3a 0d 01 90 17 f2 |'..|....|..:.....|
|00000430| 6e 65 77 64 69 73 63 28 | 64 73 74 64 72 76 24 2c |newdisc(|dstdrv$,|
|00000440| b9 29 0d 01 9a 05 3a 0d | 01 a4 17 f2 73 63 61 6e |.)....:.|....scan|
|00000450| 28 73 72 63 64 72 76 24 | 2b 22 2e 24 22 29 0d 01 |(srcdrv$|+".$")..|
|00000460| ae 0d e7 20 b1 3e 30 20 | 8c 20 f1 0d 01 b8 14 e7 |... .>0 |. ......|
|00000470| 20 72 65 61 6c 20 8c 20 | f2 75 70 64 61 74 65 0d | real . |.update.|
|00000480| 01 c2 24 f1 20 22 53 75 | 63 63 65 73 73 3a 20 20 |..$. "Su|ccess:  |
|00000490| 64 75 6d 70 20 63 6f 6d | 70 6c 65 74 65 64 20 4f |dump com|pleted O|
|000004a0| 4b 22 27 0d 01 cc 05 3a | 0d 01 d6 05 e0 0d 01 e0 |K"'....:|........|
|000004b0| 04 0d 01 ea 20 dd 20 f2 | 63 6f 70 79 28 73 72 63 |.... . .|copy(src|
|000004c0| 24 2c 64 73 74 24 2c 6e | 61 6d 65 24 2c 6c 65 6e |$,dst$,n|ame$,len|
|000004d0| 29 0d 01 f4 0d ea 20 6e | 65 65 64 2c 4a 25 0d 01 |)..... n|eed,J%..|
|000004e0| fe 05 3a 0d 02 08 3e 3a | 20 f4 20 46 69 6e 64 20 |..:...>:| . Find |
|000004f0| 61 20 64 75 6d 70 20 64 | 69 73 63 20 77 69 74 68 |a dump d|isc with|
|00000500| 20 65 6e 6f 75 67 68 20 | 73 70 61 63 65 2c 20 74 | enough |space, t|
|00000510| 68 65 6e 20 63 6f 70 79 | 20 74 68 65 20 66 69 6c |hen copy| the fil|
|00000520| 65 0d 02 12 05 3a 0d 02 | 3a 13 20 e7 20 6c 65 6e |e....:..|:. . len|
|00000530| 3e 26 43 30 30 30 30 20 | 8c 0d 02 44 3a 20 20 f1 |>&C0000 |...D:  .|
|00000540| 20 22 57 61 72 6e 69 6e | 67 3a 20 20 66 69 6c 65 | "Warnin|g:  file|
|00000550| 20 22 3b 6e 61 6d 65 24 | 3b 22 20 69 73 20 74 6f | ";name$|;" is to|
|00000560| 6f 20 62 69 67 20 2d 20 | 6e 6f 74 20 63 6f 70 69 |o big - |not copi|
|00000570| 65 64 22 0d 02 4e 06 20 | cc 0d 02 58 1d 20 20 f2 |ed"..N. |...X.  .|
|00000580| 64 65 6c 65 74 65 28 64 | 73 74 24 2b 22 2e 22 2b |delete(d|st$+"."+|
|00000590| 6e 61 6d 65 24 29 0d 02 | 62 10 20 20 6e 65 65 64 |name$)..|b.  need|
|000005a0| 20 3d 20 6c 65 6e 0d 02 | 6c 19 20 20 e3 20 4a 25 | = len..|l.  . J%|
|000005b0| 20 3d 20 31 20 b8 20 a9 | 28 6e 61 6d 65 24 29 0d | = 1 . .|(name$).|
|000005c0| 02 76 1b 20 20 20 e7 20 | c1 6e 61 6d 65 24 2c 4a |.v.   . |.name$,J|
|000005d0| 25 2c 31 29 3d 22 2e 22 | 20 8c 0d 02 77 14 20 20 |%,1)="."| ...w.  |
|000005e0| 20 20 6e 65 65 64 20 2b | 3d 20 26 38 30 30 0d 02 |  need +|= &800..|
|000005f0| 80 08 20 20 20 cd 0d 02 | 8a 07 20 20 ed 0d 02 94 |..   ...|..  ....|
|00000600| 18 20 20 f2 65 6e 73 75 | 72 65 28 64 73 74 24 2c |.  .ensu|re(dst$,|
|00000610| 6e 65 65 64 29 0d 02 9e | 37 20 20 f2 64 65 6c 65 |need)...|7  .dele|
|00000620| 74 65 28 64 73 74 24 2b | 22 2e 22 2b 6e 61 6d 65 |te(dst$+|"."+name|
|00000630| 24 29 20 3a 20 f4 20 64 | 69 73 63 20 6d 61 79 20 |$) : . d|isc may |
|00000640| 68 61 76 65 20 63 68 61 | 6e 67 65 64 0d 02 a8 47 |have cha|nged...G|
|00000650| 20 20 f1 20 22 49 6e 66 | 6f 3a 20 20 63 6f 70 79 |  . "Inf|o:  copy|
|00000660| 69 6e 67 20 22 3b 6e 61 | 6d 65 24 3b 22 20 73 69 |ing ";na|me$;" si|
|00000670| 7a 65 20 22 3b 6c 65 6e | 3b 22 2e 20 66 72 6f 6d |ze ";len|;". from|
|00000680| 20 22 3b 73 72 63 24 3b | 22 20 74 6f 20 22 3b 64 | ";src$;|" to ";d|
|00000690| 73 74 24 0d 02 b2 24 20 | 20 e7 20 72 65 61 6c 20 |st$...$ | . real |
|000006a0| 8c 20 f2 63 70 79 28 73 | 72 63 24 2c 64 73 74 24 |. .cpy(s|rc$,dst$|
|000006b0| 2c 6e 61 6d 65 24 29 0d | 02 bc 06 20 cd 0d 02 c6 |,name$).|... ....|
|000006c0| 05 e1 0d 02 d0 04 0d 02 | da 14 dd 20 f2 64 65 6c |........|... .del|
|000006d0| 65 74 65 28 66 69 6c 65 | 24 29 0d 02 e4 05 3a 0d |ete(file|$)....:.|
|000006e0| 02 ee 36 3a 20 f4 20 46 | 6f 72 63 65 66 75 6c 6c |..6: . F|orcefull|
|000006f0| 79 20 72 65 6d 6f 76 65 | 20 74 68 65 20 67 69 76 |y remove| the giv|
|00000700| 65 6e 20 66 69 6c 65 2c | 20 69 66 20 69 74 20 65 |en file,| if it e|
|00000710| 78 69 73 74 73 0d 02 f8 | 05 3a 0d 03 02 0d 20 e7 |xists...|.:.... .|
|00000720| 20 72 65 61 6c 20 8c 0d | 03 0c 18 20 20 e7 20 a4 | real ..|...  . .|
|00000730| 70 65 65 6b 28 66 69 6c | 65 24 29 3d 31 20 8c 0d |peek(fil|e$)=1 ..|
|00000740| 03 16 32 20 20 20 f1 20 | 22 49 6e 66 6f 3a 20 20 |..2   . |"Info:  |
|00000750| 73 75 70 65 72 73 65 64 | 69 6e 67 20 65 78 69 73 |supersed|ing exis|
|00000760| 74 69 6e 67 20 66 69 6c | 65 20 22 3b 66 69 6c 65 |ting fil|e ";file|
|00000770| 24 0d 03 20 2d 20 20 20 | c8 99 20 22 4f 53 5f 46 |$.. -   |.. "OS_F|
|00000780| 53 43 6f 6e 74 72 6f 6c | 22 2c 32 37 2c 66 69 6c |SControl|",27,fil|
|00000790| 65 24 2c 2c 25 30 30 30 | 30 30 30 30 31 30 0d 03 |e$,,%000|000010..|
|000007a0| 2a 07 20 20 cd 0d 03 34 | 06 20 cd 0d 03 3e 05 e1 |*.  ...4|. ...>..|
|000007b0| 0d 03 48 04 0d 03 52 1b | dd 20 f2 63 70 79 28 73 |..H...R.|. .cpy(s|
|000007c0| 72 63 24 2c 64 73 74 24 | 2c 6e 61 6d 65 24 29 0d |rc$,dst$|,name$).|
|000007d0| 03 5c 0f ea 20 64 69 72 | 24 2c 6e 61 6d 24 0d 03 |.\.. dir|$,nam$..|
|000007e0| 66 05 3a 0d 03 70 44 3a | 20 f4 20 43 72 65 61 74 |f.:..pD:| . Creat|
|000007f0| 65 20 61 6e 79 20 64 69 | 72 65 63 74 6f 72 69 65 |e any di|rectorie|
|00000800| 73 20 74 68 61 74 20 61 | 72 65 20 72 65 71 75 69 |s that a|re requi|
|00000810| 72 65 64 2c 20 74 68 65 | 6e 20 63 6f 70 79 20 74 |red, the|n copy t|
|00000820| 68 65 20 66 69 6c 65 0d | 03 7a 05 3a 0d 03 84 28 |he file.|.z.:...(|
|00000830| 20 64 69 72 24 20 3d 20 | 64 73 74 24 2b 22 2e 24 | dir$ = |dst$+".$|
|00000840| 22 20 3a 20 6e 61 6d 24 | 20 3d 20 c1 6e 61 6d 65 |" : nam$| = .name|
|00000850| 24 2c 33 29 0d 03 8e 14 | 20 c8 95 20 a7 6e 61 6d |$,3)....| .. .nam|
|00000860| 24 2c 22 2e 22 29 3e 30 | 0d 03 98 25 20 20 64 69 |$,".")>0|...%  di|
|00000870| 72 24 20 2b 3d 20 22 2e | 22 2b c0 6e 61 6d 24 2c |r$ += ".|"+.nam$,|
|00000880| a7 6e 61 6d 24 2c 22 2e | 22 29 2d 31 29 0d 03 a2 |.nam$,".|")-1)...|
|00000890| 18 20 20 e7 20 a4 70 65 | 65 6b 28 64 69 72 24 29 |.  . .pe|ek(dir$)|
|000008a0| 3c 3e 32 20 8c 0d 03 ac | 2a 20 20 20 f1 20 22 49 |<>2 ....|*   . "I|
|000008b0| 6e 66 6f 3a 20 20 63 72 | 65 61 74 69 6e 67 20 64 |nfo:  cr|eating d|
|000008c0| 69 72 65 63 74 6f 72 79 | 20 22 3b 64 69 72 24 0d |irectory| ";dir$.|
|000008d0| 03 b6 1e 20 20 20 c8 99 | 20 22 4f 53 5f 46 69 6c |...   ..| "OS_Fil|
|000008e0| 65 22 2c 38 2c 64 69 72 | 24 2c 2c 2c 30 0d 03 c0 |e",8,dir|$,,,0...|
|000008f0| 07 20 20 cd 0d 03 ca 20 | 20 20 6e 61 6d 24 20 3d |.  .... |  nam$ =|
|00000900| 20 c1 6e 61 6d 24 2c a7 | 6e 61 6d 24 2c 22 2e 22 | .nam$,.|nam$,"."|
|00000910| 29 2b 31 29 0d 03 d4 06 | 20 ce 0d 03 de 42 20 c8 |)+1)....| ....B .|
|00000920| 99 20 22 4f 53 5f 46 53 | 43 6f 6e 74 72 6f 6c 22 |. "OS_FS|Control"|
|00000930| 2c 32 36 2c 73 72 63 24 | 2b 22 2e 22 2b 6e 61 6d |,26,src$|+"."+nam|
|00000940| 65 24 2c 64 73 74 24 2b | 22 2e 22 2b 6e 61 6d 65 |e$,dst$+|"."+name|
|00000950| 24 2c 25 30 30 30 30 30 | 30 30 31 30 0d 03 e8 05 |$,%00000|0010....|
|00000960| e1 0d 03 f2 04 0d 03 fc | 12 dd 20 a4 70 65 65 6b |........|.. .peek|
|00000970| 28 66 69 6c 65 24 29 0d | 04 06 0a ea 20 74 79 70 |(file$).|.... typ|
|00000980| 65 0d 04 10 05 3a 0d 04 | 1a 28 3a 20 f4 20 47 65 |e....:..|.(: . Ge|
|00000990| 74 20 74 68 65 20 74 79 | 70 65 20 6f 66 20 74 68 |t the ty|pe of th|
|000009a0| 65 20 6e 61 6d 65 64 20 | 6f 62 6a 65 63 74 0d 04 |e named |object..|
|000009b0| 24 05 3a 0d 04 2e 21 20 | c8 99 20 22 58 4f 53 5f |$.:...! |.. "XOS_|
|000009c0| 46 69 6c 65 22 2c 35 2c | 66 69 6c 65 24 20 b8 20 |File",5,|file$ . |
|000009d0| 74 79 70 65 0d 04 38 25 | 20 e7 20 28 74 79 70 65 |type..8%| . (type|
|000009e0| 3c 30 29 20 84 20 28 74 | 79 70 65 3e 32 29 20 8c |<0) . (t|ype>2) .|
|000009f0| 20 74 79 70 65 20 3d 20 | 30 0d 04 42 0a 3d 20 74 | type = |0..B.= t|
|00000a00| 79 70 65 0d 04 4c 04 0d | 04 56 18 dd 20 f2 65 6e |ype..L..|.V.. .en|
|00000a10| 73 75 72 65 28 64 72 76 | 24 2c 6e 65 65 64 29 0d |sure(drv|$,need).|
|00000a20| 04 60 0a ea 20 66 72 65 | 65 0d 04 6a 05 3a 0d 04 |.`.. fre|e..j.:..|
|00000a30| 74 3f 3a 20 f4 20 45 6e | 73 75 72 65 20 74 68 61 |t?: . En|sure tha|
|00000a40| 74 20 74 68 65 20 64 72 | 69 76 65 20 68 61 73 20 |t the dr|ive has |
|00000a50| 61 74 20 6c 65 61 73 74 | 20 74 68 61 74 20 6d 75 |at least| that mu|
|00000a60| 63 68 20 66 72 65 65 20 | 73 70 61 63 65 0d 04 7e |ch free |space..~|
|00000a70| 05 3a 0d 04 88 06 20 f5 | 0d 04 92 26 20 20 c8 99 |.:.... .|...&  ..|
|00000a80| 20 22 41 44 46 53 5f 46 | 72 65 65 53 70 61 63 65 | "ADFS_F|reeSpace|
|00000a90| 22 2c 64 72 76 24 20 b8 | 20 2c 66 72 65 65 0d 04 |",drv$ .| ,free..|
|00000aa0| 9c 13 20 20 e7 20 66 72 | 65 65 3c 6e 65 65 64 20 |..  . fr|ee<need |
|00000ab0| 8c 0d 04 a6 50 20 20 20 | f1 20 22 57 61 72 6e 69 |....P   |. "Warni|
|00000ac0| 6e 67 3a 20 20 6e 6f 74 | 20 65 6e 6f 75 67 68 20 |ng:  not| enough |
|00000ad0| 73 70 61 63 65 20 6f 6e | 20 22 3b 64 72 76 24 3b |space on| ";drv$;|
|00000ae0| 22 20 28 6e 65 65 64 20 | 22 3b 6e 65 65 64 3b 22 |" (need |";need;"|
|00000af0| 2c 20 66 72 65 65 20 22 | 3b 66 72 65 65 3b 22 29 |, free "|;free;")|
|00000b00| 22 0d 04 b0 17 20 20 20 | f2 6e 65 77 64 69 73 63 |"....   |.newdisc|
|00000b10| 28 64 72 76 24 2c a3 29 | 0d 04 ba 07 20 20 cd 0d |(drv$,.)|....  ..|
|00000b20| 04 c4 11 20 fd 20 66 72 | 65 65 3e 3d 6e 65 65 64 |... . fr|ee>=need|
|00000b30| 0d 04 ce 05 e1 0d 04 d8 | 04 0d 04 e2 1a dd 20 f2 |........|...... .|
|00000b40| 6e 65 77 64 69 73 63 28 | 64 72 76 24 2c 66 69 72 |newdisc(|drv$,fir|
|00000b50| 73 74 29 0d 04 ec 1b ea | 20 72 6f 6f 74 6f 6b 2c |st).....| rootok,|
|00000b60| 77 72 64 24 2c 66 6f 72 | 6d 61 74 74 65 64 0d 04 |wrd$,for|matted..|
|00000b70| f6 14 ea 20 62 6c 6b 20 | 3a 20 de 20 62 6c 6b 20 |... blk |: . blk |
|00000b80| 34 30 0d 05 00 09 ea 20 | 6e 75 6d 0d 05 0a 05 3a |40..... |num....:|
|00000b90| 0d 05 14 2c 3a 20 f4 20 | 52 65 71 75 65 73 74 20 |...,: . |Request |
|00000ba0| 74 68 61 74 20 61 6e 6f | 74 68 65 72 20 64 69 73 |that ano|ther dis|
|00000bb0| 63 20 69 73 20 6d 6f 75 | 6e 74 65 64 0d 05 1e 40 |c is mou|nted...@|
|00000bc0| 3a 20 f4 20 49 66 20 69 | 74 20 69 73 20 62 6c 61 |: . If i|t is bla|
|00000bd0| 6e 6b 2c 20 66 6f 72 6d | 61 74 20 69 74 20 2d 20 |nk, form|at it - |
|00000be0| 6f 74 68 65 72 77 69 73 | 65 20 6d 61 79 62 65 20 |otherwis|e maybe |
|00000bf0| 63 6c 65 61 72 20 69 74 | 20 6f 75 74 0d 05 28 05 |clear it| out..(.|
|00000c00| 3a 0d 05 32 2b e7 20 66 | 69 72 73 74 20 8c 20 77 |:..2+. f|irst . w|
|00000c10| 72 64 24 20 3d 20 22 61 | 22 20 8b 20 77 72 64 24 |rd$ = "a|" . wrd$|
|00000c20| 20 3d 20 22 61 6e 6f 74 | 68 65 72 22 0d 05 3c 11 | = "anot|her"..<.|
|00000c30| 66 6f 72 6d 61 74 74 65 | 64 20 3d 20 a3 0d 05 46 |formatte|d = ...F|
|00000c40| 06 20 f5 0d 05 50 41 20 | 20 f1 20 22 48 61 6c 74 |. ...PA | . "Halt|
|00000c50| 65 64 3a 20 20 6d 6f 75 | 6e 74 20 22 3b 77 72 64 |ed:  mou|nt ";wrd|
|00000c60| 24 3b 22 20 64 69 73 63 | 20 6f 6e 20 22 3b 64 72 |$;" disc| on ";dr|
|00000c70| 76 24 3b 22 20 74 68 65 | 6e 20 52 45 54 55 52 4e |v$;" the|n RETURN|
|00000c80| 3a 20 22 3b 0d 05 5a 14 | 20 20 f5 20 3a 20 fd 20 |: ";..Z.|  . : . |
|00000c90| a5 3d 31 33 20 3a 20 f1 | 0d 05 64 23 20 20 72 6f |.=13 : .|..d#  ro|
|00000ca0| 6f 74 6f 6b 20 3d 20 28 | a4 70 65 65 6b 28 64 72 |otok = (|.peek(dr|
|00000cb0| 76 24 2b 22 2e 24 22 29 | 3d 32 29 0d 05 6e 12 20 |v$+".$")|=2)..n. |
|00000cc0| 20 e7 20 ac 20 72 6f 6f | 74 6f 6b 20 8c 0d 05 78 | . . roo|tok ...x|
|00000cd0| 2c 20 20 20 f1 20 22 57 | 61 72 6e 69 6e 67 3a 20 |,   . "W|arning: |
|00000ce0| 20 74 68 69 73 20 64 69 | 73 63 20 69 73 20 75 6e | this di|sc is un|
|00000cf0| 72 65 61 64 61 62 6c 65 | 22 0d 05 82 2e 20 20 20 |readable|"....   |
|00000d00| f1 20 22 43 6f 6e 66 69 | 72 6d 3a 20 20 66 6f 72 |. "Confi|rm:  for|
|00000d10| 6d 61 74 20 74 68 69 73 | 20 64 69 73 63 20 28 59 |mat this| disc (Y|
|00000d20| 2f 4e 29 3a 20 22 3b 0d | 05 8c 11 20 20 20 e7 20 |/N): ";.|...   . |
|00000d30| a4 79 65 73 6e 6f 20 8c | 0d 05 96 30 20 20 20 20 |.yesno .|...0    |
|00000d40| f1 20 27 22 57 61 69 74 | 3a 20 20 66 6f 72 6d 61 |. '"Wait|:  forma|
|00000d50| 74 74 69 6e 67 20 64 72 | 69 76 65 20 22 3b 64 72 |tting dr|ive ";dr|
|00000d60| 76 24 3b 22 2e 2e 2e 22 | 0d 05 a0 1f 20 20 20 20 |v$;"..."|....    |
|00000d70| ff 20 22 46 4f 52 4d 41 | 54 20 22 2b 64 72 76 24 |. "FORMA|T "+drv$|
|00000d80| 2b 22 20 44 20 59 22 0d | 05 aa 25 20 20 20 20 72 |+" D Y".|..%    r|
|00000d90| 6f 6f 74 6f 6b 20 3d 20 | 28 a4 70 65 65 6b 28 64 |ootok = |(.peek(d|
|00000da0| 72 76 24 2b 22 2e 24 22 | 29 3d 32 29 0d 05 b4 15 |rv$+".$"|)=2)....|
|00000db0| 20 20 20 20 66 6f 72 6d | 61 74 74 65 64 20 3d 20 |    form|atted = |
|00000dc0| b9 0d 05 be 08 20 20 20 | cc 0d 05 c8 09 20 20 20 |.....   |.....   |
|00000dd0| 20 f1 0d 05 d2 08 20 20 | 20 cd 0d 05 dc 07 20 20 | .....  | .....  |
|00000de0| cd 0d 05 e6 0d 20 fd 20 | 72 6f 6f 74 6f 6b 0d 05 |..... . |rootok..|
|00000df0| f0 06 20 3a 0d 05 fa 14 | 20 e7 20 ac 20 66 6f 72 |.. :....| . . for|
|00000e00| 6d 61 74 74 65 64 20 8c | 0d 06 04 37 20 20 c8 99 |matted .|...7  ..|
|00000e10| 20 22 4f 53 5f 47 42 50 | 42 22 2c 31 30 2c 64 72 | "OS_GBP|B",10,dr|
|00000e20| 76 24 2b 22 2e 24 22 2c | 62 6c 6b 2c 31 2c 30 2c |v$+".$",|blk,1,0,|
|00000e30| 34 30 2c 22 2a 22 20 b8 | 20 2c 2c 2c 6e 75 6d 0d |40,"*" .| ,,,num.|
|00000e40| 06 0e 0f 20 20 e7 20 6e | 75 6d 3e 30 20 8c 0d 06 |...  . n|um>0 ...|
|00000e50| 18 31 20 20 20 f1 20 22 | 43 6f 6e 66 69 72 6d 3a |.1   . "|Confirm:|
|00000e60| 20 20 63 6c 65 61 72 20 | 6f 75 74 20 74 68 69 73 |  clear |out this|
|00000e70| 20 64 69 73 63 20 28 59 | 2f 4e 29 3a 20 22 3b 0d | disc (Y|/N): ";.|
|00000e80| 06 22 11 20 20 20 e7 20 | a4 79 65 73 6e 6f 20 8c |.".   . |.yesno .|
|00000e90| 0d 06 2c 2e 20 20 20 20 | f1 20 27 22 57 61 69 74 |..,.    |. '"Wait|
|00000ea0| 3a 20 20 63 6c 65 61 72 | 69 6e 67 20 64 72 69 76 |:  clear|ing driv|
|00000eb0| 65 20 22 3b 64 72 76 24 | 3b 22 2e 2e 2e 22 0d 06 |e ";drv$|;"..."..|
|00000ec0| 36 34 20 20 20 20 c8 99 | 20 22 4f 53 5f 46 53 43 |64    ..| "OS_FSC|
|00000ed0| 6f 6e 74 72 6f 6c 22 2c | 32 37 2c 64 72 76 24 2b |ontrol",|27,drv$+|
|00000ee0| 22 2e 24 2e 2a 22 2c 2c | 25 30 30 30 30 30 30 30 |".$.*",,|%0000000|
|00000ef0| 31 31 0d 06 40 08 20 20 | 20 cc 0d 06 4a 09 20 20 |11..@.  | ...J.  |
|00000f00| 20 20 f1 0d 06 54 08 20 | 20 20 cd 0d 06 5e 07 20 |  ...T. |  ...^. |
|00000f10| 20 cd 0d 06 68 06 20 cd | 0d 06 72 05 e1 0d 06 7c | ...h. .|..r....||
|00000f20| 04 0d 06 86 12 dd 20 f2 | 73 63 61 6e 28 72 6f 6f |...... .|scan(roo|
|00000f30| 74 24 29 0d 06 90 1e ea | 20 62 6c 6b 2c 6f 66 66 |t$).....| blk,off|
|00000f40| 2c 6e 61 6d 65 24 2c 4a | 25 2c 64 69 72 2c 6e 75 |,name$,J|%,dir,nu|
|00000f50| 6d 0d 06 9a 05 3a 0d 06 | a4 48 3a 20 f4 20 54 72 |m....:..|.H: . Tr|
|00000f60| 61 76 65 72 73 65 20 61 | 20 64 69 72 65 63 74 6f |averse a| directo|
|00000f70| 72 79 20 73 75 62 74 72 | 65 65 2c 20 63 61 6c 6c |ry subtr|ee, call|
|00000f80| 69 6e 67 20 50 52 4f 43 | 61 63 74 69 6f 6e 20 66 |ing PROC|action f|
|00000f90| 6f 72 20 65 61 63 68 20 | 6f 62 6a 65 63 74 0d 06 |or each |object..|
|00000fa0| ae 29 3a 20 f4 20 61 6e | 64 20 72 65 63 75 72 73 |.): . an|d recurs|
|00000fb0| 69 6e 67 20 66 6f 72 20 | 65 61 63 68 20 64 69 72 |ing for |each dir|
|00000fc0| 65 63 74 6f 72 79 2e 0d | 06 b8 05 3a 0d 06 c2 0d |ectory..|...:....|
|00000fd0| 20 de 20 62 6c 6b 20 34 | 30 0d 06 cc 0c 20 6f 66 | . blk 4|0.... of|
|00000fe0| 66 20 3d 20 30 0d 06 d6 | 06 20 f5 0d 06 e0 39 20 |f = 0...|. ....9 |
|00000ff0| 20 c8 99 20 22 4f 53 5f | 47 42 50 42 22 2c 31 30 | .. "OS_|GBPB",10|
|00001000| 2c 72 6f 6f 74 24 2c 62 | 6c 6b 2c 31 2c 6f 66 66 |,root$,b|lk,1,off|
|00001010| 2c 34 30 2c 22 2a 22 20 | b8 20 2c 2c 2c 6e 75 6d |,40,"*" |. ,,,num|
|00001020| 2c 6f 66 66 0d 06 ea 0f | 20 20 e7 20 6e 75 6d 3d |,off....|  . num=|
|00001030| 31 20 8c 0d 06 f4 29 20 | 20 20 4a 25 20 3d 20 32 |1 ....) |  J% = 2|
|00001040| 30 20 3a 20 f5 20 3a 20 | 4a 25 20 2b 3d 20 31 20 |0 : . : |J% += 1 |
|00001050| 3a 20 fd 20 62 6c 6b 3f | 4a 25 3d 30 0d 06 fe 26 |: . blk?|J%=0...&|
|00001060| 20 20 20 62 6c 6b 3f 4a | 25 20 3d 20 31 33 20 3a |   blk?J|% = 13 :|
|00001070| 20 6e 61 6d 65 24 20 3d | 20 24 28 62 6c 6b 2b 32 | name$ =| $(blk+2|
|00001080| 30 29 0d 07 08 17 20 20 | 20 64 69 72 20 3d 20 28 |0)....  | dir = (|
|00001090| 62 6c 6b 21 31 36 3d 32 | 29 0d 07 12 31 20 20 20 |blk!16=2|)...1   |
|000010a0| f2 61 63 74 69 6f 6e 28 | 72 6f 6f 74 24 2c 6e 61 |.action(|root$,na|
|000010b0| 6d 65 24 2c 64 69 72 2c | 62 6c 6b 21 30 2c 62 6c |me$,dir,|blk!0,bl|
|000010c0| 6b 21 34 2c 62 6c 6b 21 | 38 29 0d 07 1c 25 20 20 |k!4,blk!|8)...%  |
|000010d0| 20 e7 20 64 69 72 20 8c | 20 f2 73 63 61 6e 28 72 | . dir .| .scan(r|
|000010e0| 6f 6f 74 24 2b 22 2e 22 | 2b 6e 61 6d 65 24 29 0d |oot$+"."|+name$).|
|000010f0| 07 26 07 20 20 cd 0d 07 | 30 0c 20 fd 20 6f 66 66 |.&.  ...|0. . off|
|00001100| 3c 30 0d 07 3a 05 e1 0d | 07 44 04 0d 07 4e 2b dd |<0..:...|.D...N+.|
|00001110| 20 f2 61 63 74 69 6f 6e | 28 64 69 72 24 2c 6e 61 | .action|(dir$,na|
|00001120| 6d 65 24 2c 64 69 72 2c | 6c 6f 61 64 2c 65 78 65 |me$,dir,|load,exe|
|00001130| 63 2c 6c 65 6e 29 0d 07 | 58 25 ea 20 73 74 61 6d |c,len)..|X%. stam|
|00001140| 70 2c 63 6f 70 79 74 68 | 69 73 2c 6b 65 79 24 2c |p,copyth|is,key$,|
|00001150| 73 6b 69 70 2c 6e 6f 63 | 6f 70 24 0d 07 62 05 3a |skip,noc|op$..b.:|
|00001160| 0d 07 6c 2a 3a 20 f4 20 | 44 65 63 69 64 65 20 77 |..l*: . |Decide w|
|00001170| 68 65 74 68 65 72 20 74 | 6f 20 63 6f 70 79 20 6f |hether t|o copy o|
|00001180| 76 65 72 20 61 20 66 69 | 6c 65 0d 07 76 05 3a 0d |ver a fi|le..v.:.|
|00001190| 07 80 1e 20 73 74 61 6d | 70 20 3d 20 a4 73 74 61 |... stam|p = .sta|
|000011a0| 6d 70 28 6c 6f 61 64 2c | 65 78 65 63 29 0d 07 8a |mp(load,|exec)...|
|000011b0| 39 20 f1 20 bd 28 31 33 | 29 3b 22 53 63 61 6e 6e |9 . .(13|);"Scann|
|000011c0| 69 6e 67 3a 20 20 22 3b | 64 69 72 24 3b 22 2e 22 |ing:  ";|dir$;"."|
|000011d0| 3b 6e 61 6d 65 24 3b 22 | 20 20 22 3b 6c 65 6e 3b |;name$;"|  ";len;|
|000011e0| 22 2e 20 20 22 3b 0d 07 | 94 0c 20 e7 20 64 69 72 |".  ";..|.. . dir|
|000011f0| 20 8c 0d 07 9e 0e 20 20 | f1 20 22 44 69 72 22 3b | .....  |. "Dir";|
|00001200| 0d 07 a8 06 20 cc 0d 07 | b2 14 20 20 f1 20 a4 74 |.... ...|..  . .t|
|00001210| 79 70 65 28 6c 6f 61 64 | 29 3b 0d 07 bc 06 20 cd |ype(load|);.... .|
|00001220| 0d 07 c6 10 20 ef 20 32 | 33 2c 38 2c 35 2c 36 7c |.... . 2|3,8,5,6||
|00001230| 0d 07 d0 06 20 3a 0d 07 | da 0d 20 73 6b 69 70 20 |.... :..|.. skip |
|00001240| 3d 20 a3 0d 07 e4 0c 20 | e7 20 73 65 6c 20 8c 0d |= ..... |. sel ..|
|00001250| 07 ee 07 20 20 f7 0d 07 | f8 07 20 20 f5 0d 08 02 |...  ...|..  ....|
|00001260| 0f 20 20 20 f3 20 6e 6f | 63 6f 70 24 0d 08 0c 2b |.   . no|cop$...+|
|00001270| 20 20 20 e7 20 c2 64 69 | 72 24 2c a9 28 6e 6f 63 |   . .di|r$,.(noc|
|00001280| 6f 70 24 29 29 3d 6e 6f | 63 6f 70 24 20 8c 20 73 |op$))=no|cop$ . s|
|00001290| 6b 69 70 20 3d 20 b9 0d | 08 16 16 20 20 fd 20 6e |kip = ..|...  . n|
|000012a0| 6f 63 6f 70 24 3d 22 2a | 45 4e 44 2a 22 0d 08 20 |ocop$="*|END*".. |
|000012b0| 06 20 cd 0d 08 2a 0d 20 | e7 20 73 6b 69 70 20 8c |. ...*. |. skip .|
|000012c0| 0d 08 34 38 20 20 f1 20 | 27 22 49 6e 66 6f 3a 20 |..48  . |'"Info: |
|000012d0| 20 73 6b 69 70 70 69 6e | 67 20 65 78 63 6c 75 64 | skippin|g exclud|
|000012e0| 65 64 20 66 69 6c 65 20 | 22 3b 64 69 72 24 2b 22 |ed file |";dir$+"|
|000012f0| 2e 22 2b 6e 61 6d 65 24 | 0d 08 3e 06 20 cd 0d 08 |."+name$|..>. ...|
|00001300| 48 06 20 3a 0d 08 52 1b | 20 e7 20 28 ac 20 64 69 |H. :..R.| . (. di|
|00001310| 72 29 20 80 20 28 ac 20 | 73 6b 69 70 29 20 8c 0d |r) . (. |skip) ..|
|00001320| 08 5c 0e 20 20 e7 20 66 | 75 6c 6c 20 8c 0d 08 66 |.\.  . f|ull ...f|
|00001330| 13 20 20 20 63 6f 70 79 | 74 68 69 73 20 3d 20 b9 |.   copy|this = .|
|00001340| 0d 08 70 07 20 20 cc 0d | 08 7a 12 20 20 20 e7 20 |..p.  ..|.z.   . |
|00001350| 73 74 61 6d 70 3e 30 20 | 8c 0d 08 84 23 20 20 20 |stamp>0 |....#   |
|00001360| 20 e7 20 73 74 61 6d 70 | 3e 64 61 74 65 20 8c 20 | . stamp|>date . |
|00001370| 63 6f 70 79 74 68 69 73 | 20 3d 20 b9 0d 08 8e 08 |copythis| = .....|
|00001380| 20 20 20 cc 0d 08 98 38 | 20 20 20 20 f1 20 27 22 |   ....8|    . '"|
|00001390| 43 6f 6e 66 69 72 6d 3a | 20 20 63 6f 70 79 20 74 |Confirm:|  copy t|
|000013a0| 68 69 73 20 75 6e 73 74 | 61 6d 70 65 64 20 66 69 |his unst|amped fi|
|000013b0| 6c 65 20 28 59 2f 4e 29 | 3a 20 22 3b 0d 08 a2 2c |le (Y/N)|: ";...,|
|000013c0| 20 20 20 20 63 6f 70 79 | 74 68 69 73 20 3d 20 a4 |    copy|this = .|
|000013d0| 79 65 73 6e 6f 20 3a 20 | e7 20 ac 20 63 6f 70 79 |yesno : |. . copy|
|000013e0| 74 68 69 73 20 8c 20 f1 | 0d 08 ac 08 20 20 20 cd |this . .|....   .|
|000013f0| 0d 08 b6 07 20 20 cd 0d | 08 c0 12 20 20 e7 20 63 |....  ..|...  . c|
|00001400| 6f 70 79 74 68 69 73 20 | 8c 0d 08 ca 08 20 20 20 |opythis |.....   |
|00001410| f1 0d 08 d4 34 20 20 20 | f2 63 6f 70 79 28 73 72 |....4   |.copy(sr|
|00001420| 63 64 72 76 24 2c 64 73 | 74 64 72 76 24 2c c1 64 |cdrv$,ds|tdrv$,.d|
|00001430| 69 72 24 2b 22 2e 22 2b | 6e 61 6d 65 24 2c 34 29 |ir$+"."+|name$,4)|
|00001440| 2c 6c 65 6e 29 0d 08 de | 07 20 20 cd 0d 08 e8 06 |,len)...|.  .....|
|00001450| 20 cd 0d 08 f2 05 e1 0d | 08 fc 04 0d 09 06 0c dd | .......|........|
|00001460| 20 a4 79 65 73 6e 6f 0d | 09 10 0a ea 20 6b 65 79 | .yesno.|.... key|
|00001470| 24 0d 09 1a 05 3a 0d 09 | 24 21 3a 20 f4 20 41 63 |$....:..|$!: . Ac|
|00001480| 63 65 70 74 20 61 20 59 | 65 73 20 6f 72 20 4e 6f |cept a Y|es or No|
|00001490| 20 61 6e 73 77 65 72 0d | 09 2e 05 3a 0d 09 38 06 | answer.|...:..8.|
|000014a0| 20 f5 0d 09 42 0e 20 20 | 6b 65 79 24 20 3d 20 be | ...B.  |key$ = .|
|000014b0| 0d 09 4c 16 20 fd 20 a7 | 22 59 4e 79 6e 22 2c 6b |..L. . .|"YNyn",k|
|000014c0| 65 79 24 29 3e 30 0d 09 | 56 0c 20 f1 20 6b 65 79 |ey$)>0..|V. . key|
|000014d0| 24 3b 0d 09 60 1b 3d 20 | 28 6b 65 79 24 3d 22 59 |$;..`.= |(key$="Y|
|000014e0| 22 20 84 20 6b 65 79 24 | 3d 22 79 22 29 0d 09 6a |" . key$|="y")..j|
|000014f0| 04 0d 09 74 0c dd 20 f2 | 64 64 61 74 65 0d 09 7e |...t.. .|ddate..~|
|00001500| 1d ea 20 74 79 70 65 2c | 6c 6f 61 64 2c 65 78 65 |.. type,|load,exe|
|00001510| 63 2c 5a 2c 65 6e 64 2c | 49 25 0d 09 88 20 ea 20 |c,Z,end,|I%... . |
|00001520| 62 6c 6b 2c 73 74 72 20 | 3a 20 de 20 62 6c 6b 20 |blk,str |: . blk |
|00001530| 35 2c 20 73 74 72 20 31 | 30 30 0d 09 92 05 3a 0d |5, str 1|00....:.|
|00001540| 09 9c 44 3a 20 f4 20 47 | 65 74 20 74 68 65 20 6c |..D: . G|et the l|
|00001550| 61 73 74 20 64 75 6d 70 | 20 64 61 74 65 20 66 72 |ast dump| date fr|
|00001560| 6f 6d 20 74 68 65 20 74 | 69 6d 65 73 74 61 6d 70 |om the t|imestamp|
|00001570| 20 6f 66 20 74 68 65 20 | 6d 61 72 6b 65 72 20 66 | of the |marker f|
|00001580| 69 6c 65 0d 09 a6 05 3a | 0d 09 b0 3b 20 c8 99 20 |ile....:|...; .. |
|00001590| 22 4f 53 5f 46 69 6c 65 | 22 2c 35 2c 73 72 63 64 |"OS_File|",5,srcd|
|000015a0| 72 76 24 2b 22 2e 24 2e | 44 75 6d 70 44 61 74 65 |rv$+".$.|DumpDate|
|000015b0| 22 20 b8 20 74 79 70 65 | 2c 2c 6c 6f 61 64 2c 65 |" . type|,,load,e|
|000015c0| 78 65 63 0d 09 ba 10 20 | e7 20 74 79 70 65 3c 3e |xec.... |. type<>|
|000015d0| 31 20 8c 0d 09 c4 2d 20 | 20 64 61 74 65 20 3d 20 |1 ....- | date = |
|000015e0| 30 20 3a 20 f4 20 6d 61 | 72 6b 65 72 20 66 69 6c |0 : . ma|rker fil|
|000015f0| 65 20 64 6f 65 73 20 6e | 6f 74 20 65 78 69 73 74 |e does n|ot exist|
|00001600| 0d 09 ce 06 20 cc 0d 09 | d8 1e 20 20 64 61 74 65 |.... ...|..  date|
|00001610| 20 3d 20 a4 73 74 61 6d | 70 28 6c 6f 61 64 2c 65 | = .stam|p(load,e|
|00001620| 78 65 63 29 0d 09 e2 11 | 20 20 e7 20 64 61 74 65 |xec)....|  . date|
|00001630| 3c 3e 30 20 8c 0d 09 ec | 2d 20 20 20 21 62 6c 6b |<>0 ....|-   !blk|
|00001640| 20 3d 20 65 78 65 63 20 | 3a 20 62 6c 6b 3f 34 20 | = exec |: blk?4 |
|00001650| 3d 20 6c 6f 61 64 20 80 | 20 26 30 30 30 30 30 30 |= load .| &000000|
|00001660| 46 46 0d 09 f6 3c 20 20 | 20 c8 99 20 22 4f 53 5f |FF...<  | .. "OS_|
|00001670| 43 6f 6e 76 65 72 74 53 | 74 61 6e 64 61 72 64 44 |ConvertS|tandardD|
|00001680| 61 74 65 41 6e 64 54 69 | 6d 65 22 2c 62 6c 6b 2c |ateAndTi|me",blk,|
|00001690| 73 74 72 2c 31 30 30 20 | b8 20 2c 65 6e 64 0d 0a |str,100 |. ,end..|
|000016a0| 00 1f 20 20 20 3f 65 6e | 64 20 3d 20 31 33 20 3a |..   ?en|d = 13 :|
|000016b0| 20 64 61 74 65 24 20 3d | 20 24 73 74 72 0d 0a 0a | date$ =| $str...|
|000016c0| 07 20 20 cc 0d 0a 14 2c | 20 20 20 64 61 74 65 20 |.  ....,|   date |
|000016d0| 3d 20 30 20 3a 20 f4 20 | 6d 61 72 6b 65 72 20 66 |= 0 : . |marker f|
|000016e0| 69 6c 65 20 69 73 20 75 | 6e 73 74 61 6d 70 65 64 |ile is u|nstamped|
|000016f0| 0d 0a 1e 07 20 20 cd 0d | 0a 28 06 20 cd 0d 0a 32 |....  ..|.(. ...2|
|00001700| 14 20 66 75 6c 6c 20 3d | 20 28 64 61 74 65 3d 30 |. full =| (date=0|
|00001710| 29 0d 0a 3c 05 e1 0d 0a | 46 04 0d 0a 50 11 dd 20 |)..<....|F...P.. |
|00001720| a4 74 79 70 65 28 6c 6f | 61 64 29 0d 0a 5a 09 ea |.type(lo|ad)..Z..|
|00001730| 20 62 6c 6b 0d 0a 64 05 | 3a 0d 0a 6e 42 3a 20 f4 | blk..d.|:..nB: .|
|00001740| 20 44 65 63 6f 64 65 20 | 74 68 65 20 66 69 6c 65 | Decode |the file|
|00001750| 20 74 79 70 65 20 66 72 | 6f 6d 20 61 20 6c 6f 61 | type fr|om a loa|
|00001760| 64 20 61 64 64 72 65 73 | 73 20 28 61 6c 77 61 79 |d addres|s (alway|
|00001770| 73 20 6c 65 6e 67 74 68 | 20 38 29 0d 0a 78 05 3a |s length| 8)..x.:|
|00001780| 0d 0a 82 0c 20 de 20 62 | 6c 6b 20 39 0d 0a 8c 26 |.... . b|lk 9...&|
|00001790| 20 e7 20 28 6c 6f 61 64 | 20 80 20 26 46 46 46 30 | . (load| . &FFF0|
|000017a0| 30 30 30 30 29 3c 3e 26 | 46 46 46 30 30 30 30 30 |0000)<>&|FFF00000|
|000017b0| 20 8c 0d 0a 96 12 20 20 | 3d 20 22 20 20 20 20 20 | .....  |= "     |
|000017c0| 20 20 20 22 0d 0a a0 06 | 20 cc 0d 0a aa 41 20 20 |   "....| ....A  |
|000017d0| c8 99 20 22 4f 53 5f 46 | 53 43 6f 6e 74 72 6f 6c |.. "OS_F|SControl|
|000017e0| 22 2c 31 38 2c 2c 28 6c | 6f 61 64 20 80 20 26 30 |",18,,(l|oad . &0|
|000017f0| 30 30 46 46 46 30 30 29 | 3e 3e 38 20 b8 20 2c 2c |00FFF00)|>>8 . ,,|
|00001800| 62 6c 6b 21 30 2c 62 6c | 6b 21 34 0d 0a b4 10 20 |blk!0,bl|k!4.... |
|00001810| 20 62 6c 6b 3f 38 20 3d | 20 31 33 0d 0a be 0c 20 | blk?8 =| 13.... |
|00001820| 20 3d 20 24 62 6c 6b 0d | 0a c8 06 20 cd 0d 0a d2 | = $blk.|... ....|
|00001830| 05 3d 0d 0a dc 04 0d 0a | e6 17 dd 20 a4 73 74 61 |.=......|... .sta|
|00001840| 6d 70 28 6c 6f 61 64 2c | 65 78 65 63 29 0d 0a f0 |mp(load,|exec)...|
|00001850| 13 ea 20 62 6c 6b 20 3a | 20 de 20 62 6c 6b 20 35 |.. blk :| . blk 5|
|00001860| 0d 0a fa 0a ea 20 5a 2c | 49 25 0d 0b 04 05 3a 0d |..... Z,|I%....:.|
|00001870| 0b 0e 47 3a 20 f4 20 47 | 65 74 20 66 69 6c 65 20 |..G: . G|et file |
|00001880| 61 67 65 20 28 69 6e 20 | 73 65 63 6f 6e 64 73 29 |age (in |seconds)|
|00001890| 20 66 72 6f 6d 20 61 64 | 64 72 65 73 73 65 73 20 | from ad|dresses |
|000018a0| 2d 20 63 6f 72 72 65 63 | 74 6c 79 20 74 68 69 73 |- correc|tly this|
|000018b0| 20 74 69 6d 65 21 0d 0b | 18 05 3a 0d 0b 22 26 20 | time!..|..:.."& |
|000018c0| e7 20 28 6c 6f 61 64 20 | 80 20 26 46 46 46 30 30 |. (load |. &FFF00|
|000018d0| 30 30 30 29 3c 3e 26 46 | 46 46 30 30 30 30 30 20 |000)<>&F|FF00000 |
|000018e0| 8c 0d 0b 2c 09 20 20 3d | 20 30 0d 0b 36 06 20 cc |...,.  =| 0..6. .|
|000018f0| 0d 0b 40 37 20 20 62 6c | 6b 21 30 20 3d 20 65 78 |..@7  bl|k!0 = ex|
|00001900| 65 63 20 3a 20 62 6c 6b | 3f 34 20 3d 20 28 6c 6f |ec : blk|?4 = (lo|
|00001910| 61 64 20 80 20 26 30 30 | 30 30 30 30 46 46 29 20 |ad . &00|0000FF) |
|00001920| 3a 20 5a 20 3d 20 30 0d | 0b 4a 2b 20 20 e3 20 49 |: Z = 0.|.J+  . I|
|00001930| 25 20 3d 20 30 20 b8 20 | 34 20 3a 20 5a 20 2b 3d |% = 0 . |4 : Z +=|
|00001940| 20 62 6c 6b 3f 49 25 2a | 32 35 36 5e 49 25 20 3a | blk?I%*|256^I% :|
|00001950| 20 ed 0d 0b 54 0d 20 20 | 3d 20 5a 2f 31 30 30 0d | ...T.  |= Z/100.|
|00001960| 0b 5e 06 20 cd 0d 0b 68 | 05 3d 0d 0b 72 04 0d 0b |.^. ...h|.=..r...|
|00001970| 7c 0d dd 20 f2 75 70 64 | 61 74 65 0d 0b 86 05 3a ||.. .upd|ate....:|
|00001980| 0d 0b 90 28 3a 20 f4 20 | 55 70 64 61 74 65 20 74 |...(: . |Update t|
|00001990| 68 65 20 64 75 6d 70 20 | 64 61 74 65 20 6d 61 72 |he dump |date mar|
|000019a0| 6b 65 72 20 66 69 6c 65 | 0d 0b 9a 05 3a 0d 0b a4 |ker file|....:...|
|000019b0| 34 20 c8 99 20 22 4f 53 | 5f 46 69 6c 65 22 2c 31 |4 .. "OS|_File",1|
|000019c0| 31 2c 73 72 63 64 72 76 | 24 2b 22 2e 24 2e 44 75 |1,srcdrv|$+".$.Du|
|000019d0| 6d 70 44 61 74 65 22 2c | 26 30 30 34 2c 2c 30 2c |mpDate",|&004,,0,|
|000019e0| 30 0d 0b ae 3b 20 f2 64 | 64 61 74 65 20 3a 20 f1 |0...; .d|date : .|
|000019f0| 20 22 49 6e 66 6f 3a 20 | 20 64 75 6d 70 20 74 61 | "Info: | dump ta|
|00001a00| 6b 65 6e 20 61 74 20 22 | 3b 64 61 74 65 24 3b 22 |ken at "|;date$;"|
|00001a10| 20 28 22 3b 64 61 74 65 | 3b 22 29 22 0d 0b b8 05 | (";date|;")"....|
|00001a20| e1 0d 0b c2 04 0d 0b cc | 05 3a 0d 0b d6 3d 3a 20 |........|.:...=: |
|00001a30| f4 20 44 69 72 65 63 74 | 6f 72 69 65 73 20 74 6f |. Direct|ories to|
|00001a40| 20 62 65 20 65 78 63 6c | 75 64 65 64 20 66 72 6f | be excl|uded fro|
|00001a50| 6d 20 74 68 65 20 62 61 | 63 6b 75 70 20 70 72 6f |m the ba|ckup pro|
|00001a60| 63 65 64 75 72 65 2e 0d | 0b d7 44 3a 20 f4 20 4d |cedure..|..D: . M|
|00001a70| 61 74 63 68 69 6e 67 20 | 69 73 20 64 6f 6e 65 20 |atching |is done |
|00001a80| 6f 6e 20 74 68 65 20 4c | 41 53 54 20 70 61 72 74 |on the L|AST part|
|00001a90| 20 6f 66 20 74 68 65 20 | 6e 61 6d 65 2c 20 73 6f | of the |name, so|
|00001aa0| 20 74 68 65 20 73 65 63 | 6f 6e 64 0d 0b d8 47 3a | the sec|ond...G:|
|00001ab0| 20 f4 20 6e 61 6d 65 20 | 62 65 6c 6f 77 20 77 69 | . name |below wi|
|00001ac0| 6c 6c 20 65 78 63 6c 75 | 64 65 20 41 4e 59 20 62 |ll exclu|de ANY b|
|00001ad0| 61 63 6b 75 70 20 64 69 | 72 65 63 74 6f 72 79 20 |ackup di|rectory |
|00001ae0| 66 72 6f 6d 20 62 65 69 | 6e 67 20 63 6f 70 69 65 |from bei|ng copie|
|00001af0| 64 2e 0d 0b e0 1f 3a 20 | f4 20 4e 61 6d 65 20 69 |d.....: |. Name i|
|00001b00| 73 20 63 61 73 65 20 73 | 65 6e 73 69 74 69 76 65 |s case s|ensitive|
|00001b10| 21 0d 0b ea 05 3a 0d 0b | f4 04 0d 0b fe 0e dc 20 |!....:..|....... |
|00001b20| 22 2e 24 2e 54 6d 70 22 | 0d 0c 08 0c dc 20 22 2e |".$.Tmp"|..... ".|
|00001b30| 62 61 6b 22 0d 0c 12 12 | dc 20 22 2e 24 2e 31 77 |bak"....|. ".$.1w|
|00001b40| 70 2e 68 65 78 22 0d 0c | 1c 0d dc 20 22 2a 45 4e |p.hex"..|... "*EN|
|00001b50| 44 2a 22 0d 0c 26 04 0d | 0c 30 05 e0 0d ff       |D*"..&..|.0....  |
+--------+-------------------------+-------------------------+--------+--------+